home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / games / zmud455.zip / ZMUD.EXE / 0 / RCDATA / TBUTTONDIALOG / TBUTTONDIALOG.txt
Text File  |  1997-04-13  |  37KB  |  1,244 lines
  1. object ButtonDialog: TButtonDialog
  2.   Left = 132
  3.   Top = 87
  4.   HelpContext = 150
  5.   ActiveControl = OKBtn
  6.   BorderStyle = bsDialog
  7.   Caption = 'Buttons'
  8.   ClientHeight = 353
  9.   ClientWidth = 564
  10.   Font.Color = clWindowText
  11.   Font.Height = -11
  12.   Font.Name = 'MS Sans Serif'
  13.   Font.Style = [fsBold]
  14.   ShowHint = True
  15.   OnActivate = FormActivate
  16.   OnClose = FormClose
  17.   OnCreate = FormCreate
  18.   OnDestroy = FormDestroy
  19.   OnDeactivate = FormDeactivate
  20.   OnShow = FormShow
  21.   PixelsPerInch = 96
  22.   TextHeight = 13
  23.   object Label7: TLabel
  24.     Left = 8
  25.     Top = 48
  26.     Width = 151
  27.     Height = 13
  28.     Caption = 'Click on a button below to edit it'
  29.     Font.Color = clWindowText
  30.     Font.Height = -12
  31.     Font.Name = 'MS Sans Serif'
  32.     Font.Style = []
  33.     ParentFont = False
  34.   end
  35.   object TestBtn: TBigBtn
  36.     Left = 224
  37.     Top = 302
  38.     Width = 60
  39.     Height = 23
  40.     Hint = 'Sample Button|This is a sample of the current button'
  41.     Font.Color = clBlack
  42.     Font.Height = -11
  43.     Font.Name = 'MS Sans Serif'
  44.     Font.Style = []
  45.     ParentFont = False
  46.     OnClick = TestBtnClick
  47.   end
  48.   object Label14: TLabel
  49.     Left = 8
  50.     Top = 32
  51.     Width = 89
  52.     Height = 13
  53.     Caption = 'Stored Buttons:'
  54.     Font.Color = clWindowText
  55.     Font.Height = -11
  56.     Font.Name = 'MS Sans Serif'
  57.     Font.Style = [fsBold]
  58.     ParentFont = False
  59.   end
  60.   object OKBtn: TBitBtn
  61.     Left = 320
  62.     Top = 300
  63.     Width = 77
  64.     Height = 27
  65.     Font.Color = clBtnText
  66.     Font.Height = -12
  67.     Font.Name = 'MS Sans Serif'
  68.     Font.Style = []
  69.     ParentFont = False
  70.     TabOrder = 0
  71.     OnClick = OKBtnClick
  72.     Kind = bkOK
  73.     Margin = 2
  74.     Spacing = -1
  75.     IsControl = True
  76.   end
  77.   object CancelBtn: TBitBtn
  78.     Left = 402
  79.     Top = 300
  80.     Width = 77
  81.     Height = 27
  82.     Font.Color = clBtnText
  83.     Font.Height = -12
  84.     Font.Name = 'MS Sans Serif'
  85.     Font.Style = []
  86.     ParentFont = False
  87.     TabOrder = 1
  88.     OnClick = CancelBtnClick
  89.     Kind = bkCancel
  90.     Margin = 2
  91.     Spacing = -1
  92.     IsControl = True
  93.   end
  94.   object ButtonList: TListBox
  95.     Left = 8
  96.     Top = 66
  97.     Width = 154
  98.     Height = 225
  99.     ExtendedSelect = False
  100.     Font.Color = clWindowText
  101.     Font.Height = -12
  102.     Font.Name = 'MS Sans Serif'
  103.     Font.Style = []
  104.     ItemHeight = 13
  105.     ParentFont = False
  106.     TabOrder = 2
  107.     OnClick = ButtonListClick
  108.     OnMouseDown = ButtonListMouseDown
  109.   end
  110.   object NewBtn: TBitBtn
  111.     Left = 8
  112.     Top = 300
  113.     Width = 62
  114.     Height = 27
  115.     Hint = 'Create a new button'
  116.     Caption = '&New'
  117.     Font.Color = clBtnText
  118.     Font.Height = -12
  119.     Font.Name = 'MS Sans Serif'
  120.     Font.Style = []
  121.     ParentFont = False
  122.     TabOrder = 3
  123.     OnClick = NewBtnClick
  124.     Glyph.Data = {
  125.       76010000424D7601000000000000760000002800000020000000100000000100
  126.       04000000000000010000130B0000130B00000000000000000000000000000000
  127.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  128.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
  129.       333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
  130.       0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  131.       07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  132.       07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
  133.       0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
  134.       33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
  135.       B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
  136.       3BB33773333773333773B333333B3333333B7333333733333337}
  137.     Margin = 2
  138.     NumGlyphs = 2
  139.     Spacing = -1
  140.     IsControl = True
  141.   end
  142.   object BitBtn2: TBitBtn
  143.     Left = 484
  144.     Top = 300
  145.     Width = 77
  146.     Height = 27
  147.     HelpContext = 150
  148.     Font.Color = clBtnText
  149.     Font.Height = -12
  150.     Font.Name = 'MS Sans Serif'
  151.     Font.Style = []
  152.     ParentFont = False
  153.     TabOrder = 4
  154.     Kind = bkHelp
  155.     Margin = 2
  156.     Spacing = -1
  157.     IsControl = True
  158.   end
  159.   object UpBtn: TBitBtn
  160.     Left = 168
  161.     Top = 304
  162.     Width = 22
  163.     Height = 22
  164.     Hint = 'Move Button Up'
  165.     ParentShowHint = False
  166.     ShowHint = True
  167.     TabOrder = 5
  168.     OnClick = UpBtnClick
  169.     Glyph.Data = {
  170.       90010000424D9001000000000000760000002800000020000000100000000100
  171.       0400000000000001000000000000000000000000000000000000000000000000
  172.       80000080000000808000800000008000800080800000C0C0C000808080000000
  173.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  174.       3333333333333333333333333333333333333333333333333333333333333333
  175.       333333333333333333333333333333333333333333333333333333E444444444
  176.       44433338FFFFFFFFFFFF33E6666666666643333833333333333F333E66666666
  177.       643333338333333333F33333E666666643333333383333333F3333333E666664
  178.       3333333333833333F333333333E66643333333333338333F33333333333E6433
  179.       33333333333383F3333333333333E33333333333333338333333333333333333
  180.       3333333333333333333333333333333333333333333333333333333333333333
  181.       3333333333333333333333333333333333333333333333333333000000000000
  182.       0000000000000000000000000000000000000000}
  183.     Margin = 0
  184.     NumGlyphs = 2
  185.     Spacing = -1
  186.     IsControl = True
  187.   end
  188.   object DownBtn: TBitBtn
  189.     Left = 191
  190.     Top = 304
  191.     Width = 22
  192.     Height = 22
  193.     Hint = 'Move Button Down'
  194.     ParentShowHint = False
  195.     ShowHint = True
  196.     TabOrder = 6
  197.     OnClick = DownBtnClick
  198.     Glyph.Data = {
  199.       90010000424D9001000000000000760000002800000020000000100000000100
  200.       0400000000000001000000000000000000000000000000000000000000000000
  201.       80000080000000808000800000008000800080800000C0C0C000808080000000
  202.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  203.       3333333333333333333333333333333333333333333333333333333333333333
  204.       333333333333333333333333333343333333333333333F333333333333346433
  205.       333333333333F383333333333346664333333333333F33383333333334666664
  206.       3333333333F333338333333346666666433333333F3333333833333466666666
  207.       64333333F3333333338333E6666666666643333F33333333333833EEEEEEEEEE
  208.       EE43333FFFFFFFFFFFF833333333333333333333333333333333333333333333
  209.       3333333333333333333333333333333333333333333333333333333333333333
  210.       3333333333333333333333333333333333333333333333333333000000000000
  211.       0000000000000000000000000000000000000000}
  212.     Margin = 0
  213.     NumGlyphs = 2
  214.     Spacing = -1
  215.     IsControl = True
  216.   end
  217.   object DelBtn: TBitBtn
  218.     Left = 136
  219.     Top = 300
  220.     Width = 27
  221.     Height = 27
  222.     Hint = '|Delete button'
  223.     TabOrder = 7
  224.     OnClick = DelBtnClick
  225.     Glyph.Data = {
  226.       78010000424D7801000000000000760000002800000020000000100000000100
  227.       04000000000000000000120B0000120B00000000000000000000000000000000
  228.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  229.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
  230.       3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
  231.       33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
  232.       33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
  233.       333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
  234.       03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
  235.       33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
  236.       0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
  237.       3333333337FFF7F33333333330000033333333333777773333330000}
  238.     NumGlyphs = 2
  239.     Spacing = -1
  240.     IsControl = True
  241.   end
  242.   object ButtonTab: TTabbedNotebook
  243.     Left = 168
  244.     Top = 24
  245.     Width = 393
  246.     Height = 268
  247.     Font.Color = clWindowText
  248.     Font.Height = -12
  249.     Font.Name = 'MS Sans Serif'
  250.     Font.Style = []
  251.     TabsPerRow = 6
  252.     TabFont.Color = clBtnText
  253.     TabFont.Height = -11
  254.     TabFont.Name = 'MS Sans Serif'
  255.     TabFont.Style = []
  256.     TabOrder = 8
  257.     object TTabPage
  258.       Left = 4
  259.       Top = 24
  260.       Caption = 'Button'
  261.       object Image1: TImage
  262.         Left = 32
  263.         Top = 8
  264.         Width = 32
  265.         Height = 32
  266.         AutoSize = True
  267.       end
  268.       object Label8: TLabel
  269.         Left = 72
  270.         Top = 8
  271.         Width = 277
  272.         Height = 13
  273.         Caption = 'Push buttons are labelled with the Off Caption and execute'
  274.         Font.Color = clWindowText
  275.         Font.Height = -12
  276.         Font.Name = 'MS Sans Serif'
  277.         Font.Style = []
  278.         ParentFont = False
  279.       end
  280.       object Label9: TLabel
  281.         Left = 88
  282.         Top = 23
  283.         Width = 154
  284.         Height = 13
  285.         Caption = 'the On Command when pressed.'
  286.         Font.Color = clWindowText
  287.         Font.Height = -12
  288.         Font.Name = 'MS Sans Serif'
  289.         Font.Style = []
  290.         ParentFont = False
  291.       end
  292.       object Label10: TLabel
  293.         Left = 72
  294.         Top = 40
  295.         Width = 261
  296.         Height = 13
  297.         Caption = 'Toggle buttons store their state in the specified Variable'
  298.         Font.Color = clWindowText
  299.         Font.Height = -12
  300.         Font.Name = 'MS Sans Serif'
  301.         Font.Style = []
  302.         ParentFont = False
  303.       end
  304.       object Label11: TLabel
  305.         Left = 88
  306.         Top = 56
  307.         Width = 292
  308.         Height = 13
  309.         Caption = 'and display the Off Caption when off, the On Caption when on'
  310.         Font.Color = clWindowText
  311.         Font.Height = -12
  312.         Font.Name = 'MS Sans Serif'
  313.         Font.Style = []
  314.         ParentFont = False
  315.       end
  316.       object Label12: TLabel
  317.         Left = 88
  318.         Top = 72
  319.         Width = 225
  320.         Height = 13
  321.         Caption = 'execute the On Command when pressed once, '
  322.         Font.Color = clWindowText
  323.         Font.Height = -12
  324.         Font.Name = 'MS Sans Serif'
  325.         Font.Style = []
  326.         ParentFont = False
  327.       end
  328.       object Label13: TLabel
  329.         Left = 88
  330.         Top = 88
  331.         Width = 183
  332.         Height = 13
  333.         Caption = 'the Off Command when pressed again.'
  334.         Font.Color = clWindowText
  335.         Font.Height = -12
  336.         Font.Name = 'MS Sans Serif'
  337.         Font.Style = []
  338.         ParentFont = False
  339.       end
  340.       object Label6: TLabel
  341.         Left = 22
  342.         Top = 122
  343.         Width = 56
  344.         Height = 13
  345.         Alignment = taRightJustify
  346.         Caption = 'Off Caption:'
  347.         Font.Color = clWindowText
  348.         Font.Height = -12
  349.         Font.Name = 'MS Sans Serif'
  350.         Font.Style = []
  351.         ParentFont = False
  352.       end
  353.       object OnLabel: TLabel
  354.         Left = 22
  355.         Top = 146
  356.         Width = 56
  357.         Height = 13
  358.         Alignment = taRightJustify
  359.         Caption = 'On Caption:'
  360.         Font.Color = clWindowText
  361.         Font.Height = -12
  362.         Font.Name = 'MS Sans Serif'
  363.         Font.Style = []
  364.         ParentFont = False
  365.       end
  366.       object Label3: TLabel
  367.         Left = 11
  368.         Top = 170
  369.         Width = 67
  370.         Height = 13
  371.         Alignment = taRightJustify
  372.         Caption = 'On Command:'
  373.         Font.Color = clWindowText
  374.         Font.Height = -12
  375.         Font.Name = 'MS Sans Serif'
  376.         Font.Style = []
  377.         ParentFont = False
  378.       end
  379.       object OffLabel: TLabel
  380.         Left = 11
  381.         Top = 194
  382.         Width = 67
  383.         Height = 13
  384.         Alignment = taRightJustify
  385.         Caption = 'Off Command:'
  386.         Font.Color = clWindowText
  387.         Font.Height = -12
  388.         Font.Name = 'MS Sans Serif'
  389.         Font.Style = []
  390.         ParentFont = False
  391.       end
  392.       object SpeedButton1: TSpeedButton
  393.         Left = 88
  394.         Top = 168
  395.         Width = 20
  396.         Height = 20
  397.         Hint = 'Edit On Command|'
  398.         Glyph.Data = {
  399.           78010000424D7801000000000000760000002800000020000000100000000100
  400.           04000000000000000000120B0000120B00000000000000000000000000000000
  401.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  402.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
  403.           000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
  404.           00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
  405.           F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
  406.           0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
  407.           FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
  408.           FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
  409.           0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
  410.           00333377737FFFFF7733333033000000033333373377777773330000}
  411.         NumGlyphs = 2
  412.         OnClick = SpeedButton1Click
  413.       end
  414.       object SpeedButton2: TSpeedButton
  415.         Left = 88
  416.         Top = 192
  417.         Width = 20
  418.         Height = 20
  419.         Hint = 'Edit Off Command|'
  420.         Glyph.Data = {
  421.           78010000424D7801000000000000760000002800000020000000100000000100
  422.           04000000000000000000120B0000120B00000000000000000000000000000000
  423.           800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  424.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
  425.           000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
  426.           00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
  427.           F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
  428.           0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
  429.           FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
  430.           FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
  431.           0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
  432.           00333377737FFFFF7733333033000000033333373377777773330000}
  433.         NumGlyphs = 2
  434.         OnClick = SpeedButton2Click
  435.       end
  436.       object Label5: TLabel
  437.         Left = 221
  438.         Top = 122
  439.         Width = 41
  440.         Height = 13
  441.         Alignment = taRightJustify
  442.         Caption = 'Variable:'
  443.         Font.Color = clWindowText
  444.         Font.Height = -12
  445.         Font.Name = 'MS Sans Serif'
  446.         Font.Style = []
  447.         ParentFont = False
  448.       end
  449.       object OffCaption: TEdit
  450.         Left = 88
  451.         Top = 120
  452.         Width = 121
  453.         Height = 21
  454.         Hint = '|The Off caption is displayed on the button when it is off'
  455.         AutoSize = False
  456.         Font.Color = clWindowText
  457.         Font.Height = -12
  458.         Font.Name = 'MS Sans Serif'
  459.         Font.Style = []
  460.         ParentFont = False
  461.         TabOrder = 0
  462.         OnChange = OffCaptionChange
  463.       end
  464.       object OnCaption: TEdit
  465.         Left = 88
  466.         Top = 144
  467.         Width = 121
  468.         Height = 21
  469.         Hint = '|The On Caption is displayed on the button when it is on'
  470.         AutoSize = False
  471.         Font.Color = clWindowText
  472.         Font.Height = -12
  473.         Font.Name = 'MS Sans Serif'
  474.         Font.Style = []
  475.         ParentFont = False
  476.         TabOrder = 1
  477.         OnChange = OnCaptionChange
  478.       end
  479.       object OnCommand: TEdit
  480.         Left = 112
  481.         Top = 168
  482.         Width = 265
  483.         Height = 21
  484.         Hint = '|The commands to execute when the button is pushed on'
  485.         AutoSize = False
  486.         Font.Color = clWindowText
  487.         Font.Height = -12
  488.         Font.Name = 'MS Sans Serif'
  489.         Font.Style = []
  490.         ParentFont = False
  491.         TabOrder = 2
  492.         OnChange = OnCommandChange
  493.       end
  494.       object OffCommand: TEdit
  495.         Left = 112
  496.         Top = 192
  497.         Width = 265
  498.         Height = 21
  499.         Hint = '|The commands to execute when a toggle button is pushed off'
  500.         AutoSize = False
  501.         Font.Color = clWindowText
  502.         Font.Height = -12
  503.         Font.Name = 'MS Sans Serif'
  504.         Font.Style = []
  505.         ParentFont = False
  506.         TabOrder = 3
  507.         OnChange = OffCommandChange
  508.       end
  509.       object IsToggle: TCheckBox
  510.         Left = 6
  511.         Top = 68
  512.         Width = 59
  513.         Height = 17
  514.         Hint = '|If selected, button is a toggle, otherwise it is a push button'
  515.         Alignment = taLeftJustify
  516.         Caption = 'Toggle:'
  517.         TabOrder = 4
  518.         OnClick = IsToggleClick
  519.       end
  520.       object Toggle: TEdit
  521.         Left = 272
  522.         Top = 120
  523.         Width = 105
  524.         Height = 21
  525.         Hint = '|The state of the button (0/1) is stored in the variable'
  526.         AutoSize = False
  527.         Font.Color = clWindowText
  528.         Font.Height = -12
  529.         Font.Name = 'MS Sans Serif'
  530.         Font.Style = []
  531.         ParentFont = False
  532.         TabOrder = 5
  533.         OnChange = OnCaptionChange
  534.       end
  535.     end
  536.     object TTabPage
  537.       Left = 4
  538.       Top = 24
  539.       Caption = 'Advanced'
  540.       object Label1: TLabel
  541.         Left = 184
  542.         Top = 146
  543.         Width = 43
  544.         Height = 13
  545.         Caption = 'ON Color'
  546.         Font.Color = clWindowText
  547.         Font.Height = -11
  548.         Font.Name = 'MS Sans Serif'
  549.         Font.Style = []
  550.         ParentFont = False
  551.       end
  552.       object SpeedButton3: TSpeedButton
  553.         Left = 358
  554.         Top = 144
  555.         Width = 21
  556.         Height = 21
  557.         Hint = 'Change On color'
  558.         Margin = 1
  559.         NumGlyphs = 2
  560.         OnClick = SpeedButton3Click
  561.       end
  562.       object Label4: TLabel
  563.         Left = 184
  564.         Top = 122
  565.         Width = 47
  566.         Height = 13
  567.         Caption = 'OFF Color'
  568.         Font.Color = clWindowText
  569.         Font.Height = -11
  570.         Font.Name = 'MS Sans Serif'
  571.         Font.Style = []
  572.         ParentFont = False
  573.       end
  574.       object SpeedButton4: TSpeedButton
  575.         Tag = 1
  576.         Left = 358
  577.         Top = 120
  578.         Width = 21
  579.         Height = 21
  580.         Hint = 'Change Off color'
  581.         Margin = 1
  582.         NumGlyphs = 2
  583.         OnClick = SpeedButton3Click
  584.       end
  585.       object Label17: TLabel
  586.         Left = 48
  587.         Top = 42
  588.         Width = 31
  589.         Height = 13
  590.         Caption = 'Width:'
  591.         Font.Color = clWindowText
  592.         Font.Height = -11
  593.         Font.Name = 'MS Sans Serif'
  594.         Font.Style = []
  595.         ParentFont = False
  596.       end
  597.       object Label18: TLabel
  598.         Left = 48
  599.         Top = 66
  600.         Width = 34
  601.         Height = 13
  602.         Caption = 'Height:'
  603.         Font.Color = clWindowText
  604.         Font.Height = -11
  605.         Font.Name = 'MS Sans Serif'
  606.         Font.Style = []
  607.         ParentFont = False
  608.       end
  609.       object Label19: TLabel
  610.         Left = 48
  611.         Top = 122
  612.         Width = 21
  613.         Height = 13
  614.         Caption = 'Left:'
  615.         Font.Color = clWindowText
  616.         Font.Height = -11
  617.         Font.Name = 'MS Sans Serif'
  618.         Font.Style = []
  619.         ParentFont = False
  620.       end
  621.       object Label20: TLabel
  622.         Left = 48
  623.         Top = 146
  624.         Width = 22
  625.         Height = 13
  626.         Caption = 'Top:'
  627.         Font.Color = clWindowText
  628.         Font.Height = -11
  629.         Font.Name = 'MS Sans Serif'
  630.         Font.Style = []
  631.         ParentFont = False
  632.       end
  633.       object Label21: TLabel
  634.         Left = 184
  635.         Top = 42
  636.         Width = 51
  637.         Height = 13
  638.         Caption = 'Bitmap File'
  639.         Font.Color = clWindowText
  640.         Font.Height = -11
  641.         Font.Name = 'MS Sans Serif'
  642.         Font.Style = []
  643.         ParentFont = False
  644.       end
  645.       object SpeedButton5: TSpeedButton
  646.         Left = 358
  647.         Top = 41
  648.         Width = 20
  649.         Height = 20
  650.         Hint = 'Change bitmap filename|'
  651.         Glyph.Data = {
  652.           90010000424D9001000000000000760000002800000020000000100000000100
  653.           0400000000000001000000000000000000000000000000000000000000000000
  654.           80000080000000808000800000008000800080800000C0C0C000808080000000
  655.           FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
  656.           5555555555555555555555555555555555555500000000000555550000000000
  657.           05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
  658.           B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
  659.           B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
  660.           B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
  661.           0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
  662.           5555550000055555555555000005555555555555555555555555555555555555
  663.           5555555555555555555555555555555555555555555555555555000000000000
  664.           0000000000000000000000000000000000000000}
  665.         NumGlyphs = 2
  666.         OnClick = SpeedButton5Click
  667.       end
  668.       object Label22: TLabel
  669.         Left = 184
  670.         Top = 66
  671.         Width = 67
  672.         Height = 13
  673.         Caption = 'Bitmap Margin'
  674.         Font.Color = clWindowText
  675.         Font.Height = -11
  676.         Font.Name = 'MS Sans Serif'
  677.         Font.Style = []
  678.         ParentFont = False
  679.       end
  680.       object Label2: TLabel
  681.         Left = 48
  682.         Top = 194
  683.         Width = 30
  684.         Height = 13
  685.         Alignment = taRightJustify
  686.         Caption = 'Value:'
  687.         Font.Color = clWindowText
  688.         Font.Height = -12
  689.         Font.Name = 'MS Sans Serif'
  690.         Font.Style = []
  691.         ParentFont = False
  692.       end
  693.       object OnColor: TEdit
  694.         Left = 256
  695.         Top = 144
  696.         Width = 97
  697.         Height = 21
  698.         Hint = '|Color of button face when On'
  699.         TabStop = False
  700.         Font.Color = clBlack
  701.         Font.Height = -12
  702.         Font.Name = 'Courier'
  703.         Font.Style = []
  704.         ParentFont = False
  705.         ReadOnly = True
  706.         TabOrder = 0
  707.         Text = 'Sample Text'
  708.       end
  709.       object OffColor: TEdit
  710.         Left = 256
  711.         Top = 120
  712.         Width = 97
  713.         Height = 21
  714.         Hint = '|Color of button face when Off'
  715.         TabStop = False
  716.         Font.Color = clBlack
  717.         Font.Height = -12
  718.         Font.Name = 'Courier'
  719.         Font.Style = []
  720.         ParentFont = False
  721.         ReadOnly = True
  722.         TabOrder = 1
  723.         Text = 'Sample Text'
  724.       end
  725.       object ButWidth: TSpinEdit
  726.         Left = 88
  727.         Top = 40
  728.         Width = 57
  729.         Height = 22
  730.         Hint = '|Width of button in pixels (default is 60)'
  731.         MaxValue = 999
  732.         MinValue = 1
  733.         TabOrder = 2
  734.         Value = 60
  735.         OnChange = ButWidthChange
  736.       end
  737.       object ButHeight: TSpinEdit
  738.         Left = 88
  739.         Top = 64
  740.         Width = 57
  741.         Height = 22
  742.         Hint = '|Height of button in pixels (default is 23)'
  743.         MaxValue = 999
  744.         MinValue = 1
  745.         TabOrder = 3
  746.         Value = 23
  747.         OnChange = ButWidthChange
  748.       end
  749.       object ButLeft: TSpinEdit
  750.         Left = 88
  751.         Top = 120
  752.         Width = 57
  753.         Height = 22
  754.         Hint = '|Left position of button in pixels'
  755.         MaxValue = 999
  756.         MinValue = 0
  757.         TabOrder = 4
  758.         Value = 1
  759.         OnChange = ButWidthChange
  760.       end
  761.       object ButTop: TSpinEdit
  762.         Left = 88
  763.         Top = 144
  764.         Width = 57
  765.         Height = 22
  766.         Hint = '|Top position of button in pixels'
  767.         MaxValue = 999
  768.         MinValue = 0
  769.         TabOrder = 5
  770.         Value = 1
  771.         OnChange = ButWidthChange
  772.       end
  773.       object AutoSize: TCheckBox
  774.         Left = 16
  775.         Top = 16
  776.         Width = 85
  777.         Height = 17
  778.         Hint = '|Uncheck to customize the button size'
  779.         Alignment = taLeftJustify
  780.         Caption = 'Auto Size'
  781.         TabOrder = 6
  782.         OnClick = AutoSizeClick
  783.       end
  784.       object AutoPos: TCheckBox
  785.         Left = 16
  786.         Top = 96
  787.         Width = 85
  788.         Height = 17
  789.         Hint = '|Uncheck to customize the position of the button'
  790.         Alignment = taLeftJustify
  791.         Caption = 'Auto Position'
  792.         TabOrder = 7
  793.         OnClick = AutoSizeClick
  794.       end
  795.       object Seper: TCheckBox
  796.         Left = 184
  797.         Top = 16
  798.         Width = 85
  799.         Height = 17
  800.         Hint = 
  801.           '|If checked, button width/height is used as a blank separator sp' +
  802.           'ace'
  803.         Alignment = taLeftJustify
  804.         Caption = 'Separator'
  805.         TabOrder = 8
  806.         OnClick = SeperClick
  807.       end
  808.       object BitName: TEdit
  809.         Left = 256
  810.         Top = 40
  811.         Width = 97
  812.         Height = 21
  813.         Hint = '|Name of BMP file to display on button'
  814.         TabOrder = 9
  815.         OnChange = BitNameChange
  816.       end
  817.       object Margin: TSpinEdit
  818.         Left = 256
  819.         Top = 64
  820.         Width = 57
  821.         Height = 22
  822.         Hint = '|Margin between bitmap and button caption (-1 centers)'
  823.         MaxValue = 999
  824.         MinValue = -1
  825.         TabOrder = 10
  826.         Value = -1
  827.         OnChange = BitNameChange
  828.       end
  829.       object Button1: TButton
  830.         Left = 256
  831.         Top = 168
  832.         Width = 97
  833.         Height = 25
  834.         Hint = '|Reset button color to default (gray)'
  835.         Caption = 'Default Colors'
  836.         TabOrder = 11
  837.         OnClick = Button1Click
  838.       end
  839.       object BoolVal: TEdit
  840.         Left = 88
  841.         Top = 192
  842.         Width = 105
  843.         Height = 21
  844.         Hint = '|Expression used to control state of button'
  845.         AutoSize = False
  846.         Font.Color = clWindowText
  847.         Font.Height = -12
  848.         Font.Name = 'MS Sans Serif'
  849.         Font.Style = []
  850.         ParentFont = False
  851.         TabOrder = 12
  852.         OnChange = OnCaptionChange
  853.       end
  854.     end
  855.     object TTabPage
  856.       Left = 4
  857.       Top = 24
  858.       Caption = 'Location'
  859.       object Image2: TImage
  860.         Left = 32
  861.         Top = 8
  862.         Width = 32
  863.         Height = 32
  864.         AutoSize = True
  865.       end
  866.       object Label15: TLabel
  867.         Left = 72
  868.         Top = 8
  869.         Width = 169
  870.         Height = 13
  871.         Caption = 'Select the location of the button bar'
  872.         Font.Color = clWindowText
  873.         Font.Height = -12
  874.         Font.Name = 'MS Sans Serif'
  875.         Font.Style = []
  876.         ParentFont = False
  877.       end
  878.       object Label16: TLabel
  879.         Left = 88
  880.         Top = 23
  881.         Width = 173
  882.         Height = 13
  883.         Caption = 'or select None to hide the button bar'
  884.         Font.Color = clWindowText
  885.         Font.Height = -12
  886.         Font.Name = 'MS Sans Serif'
  887.         Font.Style = []
  888.         ParentFont = False
  889.       end
  890.       object GroupBox5: TGroupBox
  891.         Left = 80
  892.         Top = 60
  893.         Width = 113
  894.         Height = 121
  895.         Caption = 'Location'
  896.         Font.Color = clWindowText
  897.         Font.Height = -12
  898.         Font.Name = 'MS Sans Serif'
  899.         Font.Style = []
  900.         ParentFont = False
  901.         TabOrder = 0
  902.         object Top: TRadioButton
  903.           Left = 24
  904.           Top = 24
  905.           Width = 65
  906.           Height = 17
  907.           Alignment = taLeftJustify
  908.           Caption = 'Top'
  909.           Checked = True
  910.           TabOrder = 0
  911.           TabStop = True
  912.           OnClick = TopClick
  913.         end
  914.         object Bottom: TRadioButton
  915.           Left = 24
  916.           Top = 40
  917.           Width = 65
  918.           Height = 17
  919.           Alignment = taLeftJustify
  920.           Caption = 'Bottom'
  921.           TabOrder = 1
  922.           OnClick = TopClick
  923.         end
  924.         object Left: TRadioButton
  925.           Left = 24
  926.           Top = 56
  927.           Width = 65
  928.           Height = 17
  929.           Alignment = taLeftJustify
  930.           Caption = 'Left'
  931.           TabOrder = 2
  932.           OnClick = TopClick
  933.         end
  934.         object Right: TRadioButton
  935.           Left = 24
  936.           Top = 72
  937.           Width = 65
  938.           Height = 17
  939.           Alignment = taLeftJustify
  940.           Caption = 'Right'
  941.           TabOrder = 3
  942.           OnClick = TopClick
  943.         end
  944.         object None: TRadioButton
  945.           Left = 24
  946.           Top = 88
  947.           Width = 65
  948.           Height = 17
  949.           Alignment = taLeftJustify
  950.           Caption = 'None'
  951.           TabOrder = 4
  952.           OnClick = TopClick
  953.         end
  954.       end
  955.     end
  956.   end
  957.   object Panel1: TPanel
  958.     Left = 0
  959.     Top = 0
  960.     Width = 564
  961.     Height = 22
  962.     Align = alTop
  963.     BevelOuter = bvNone
  964.     Caption = 'Panel1'
  965.     TabOrder = 9
  966.     object Panel2: TPanel
  967.       Left = 0
  968.       Top = 0
  969.       Width = 46
  970.       Height = 22
  971.       Align = alLeft
  972.       BevelOuter = bvNone
  973.       TabOrder = 0
  974.       object TopBtn: TSpeedButton
  975.         Left = 0
  976.         Top = 0
  977.         Width = 22
  978.         Height = 22
  979.         Hint = 'Keep on top|Forces this dialog to display on top of others'
  980.         AllowAllUp = True
  981.         GroupIndex = 1
  982.         NumGlyphs = 2
  983.         OnClick = TopBtnClick
  984.       end
  985.       object LoadBtn: TSpeedButton
  986.         Left = 22
  987.         Top = 0
  988.         Width = 22
  989.         Height = 22
  990.         Hint = 
  991.           'Update for active MUD|Loads button settings for current characte' +
  992.           'r window'
  993.         NumGlyphs = 2
  994.         OnClick = LoadBtnClick
  995.       end
  996.     end
  997.     object Panel3: TPanel
  998.       Left = 46
  999.       Top = 0
  1000.       Width = 518
  1001.       Height = 22
  1002.       Align = alClient
  1003.       BevelOuter = bvLowered
  1004.       TabOrder = 1
  1005.       object AliasBtn: TBtnPanel
  1006.         Left = 1
  1007.         Top = 1
  1008.         Width = 64
  1009.         Height = 20
  1010.         BorderColor = clHighlight
  1011.         Align = alLeft
  1012.         BorderWidth = 1
  1013.         Caption = 'Aliases'
  1014.         Font.Color = clBtnText
  1015.         Font.Height = -11
  1016.         Font.Name = 'MS Sans Serif'
  1017.         Font.Style = []
  1018.         ParentFont = False
  1019.         TabOrder = 0
  1020.         OnClick = AliasBtnClick
  1021.       end
  1022.       object VarBtn: TBtnPanel
  1023.         Left = 65
  1024.         Top = 1
  1025.         Width = 64
  1026.         Height = 20
  1027.         BorderColor = clHighlight
  1028.         Align = alLeft
  1029.         BorderWidth = 1
  1030.         Caption = 'Variables'
  1031.         Font.Color = clBtnText
  1032.         Font.Height = -11
  1033.         Font.Name = 'MS Sans Serif'
  1034.         Font.Style = []
  1035.         ParentFont = False
  1036.         TabOrder = 1
  1037.         OnClick = VarBtnClick
  1038.       end
  1039.       object MacroBtn: TBtnPanel
  1040.         Left = 129
  1041.         Top = 1
  1042.         Width = 64
  1043.         Height = 20
  1044.         BorderColor = clHighlight
  1045.         Align = alLeft
  1046.         BorderWidth = 1
  1047.         Caption = 'Macros'
  1048.         Font.Color = clBtnText
  1049.         Font.Height = -11
  1050.         Font.Name = 'MS Sans Serif'
  1051.         Font.Style = []
  1052.         ParentFont = False
  1053.         TabOrder = 2
  1054.         OnClick = MacroBtnClick
  1055.       end
  1056.       object ButBtn: TBtnPanel
  1057.         Left = 193
  1058.         Top = 1
  1059.         Width = 64
  1060.         Height = 20
  1061.         BorderColor = clHighlight
  1062.         Align = alLeft
  1063.         BorderWidth = 1
  1064.         Caption = 'Buttons'
  1065.         Font.Color = clBtnText
  1066.         Font.Height = -11
  1067.         Font.Name = 'MS Sans Serif'
  1068.         Font.Style = []
  1069.         ParentFont = False
  1070.         TabOrder = 3
  1071.         OnClick = ButBtnClick
  1072.       end
  1073.       object TrigBtn: TBtnPanel
  1074.         Left = 257
  1075.         Top = 1
  1076.         Width = 64
  1077.         Height = 20
  1078.         BorderColor = clHighlight
  1079.         Align = alLeft
  1080.         BorderWidth = 1
  1081.         Caption = 'Triggers'
  1082.         Font.Color = clBtnText
  1083.         Font.Height = -11
  1084.         Font.Name = 'MS Sans Serif'
  1085.         Font.Style = []
  1086.         ParentFont = False
  1087.         TabOrder = 4
  1088.         OnClick = TrigBtnClick
  1089.       end
  1090.       object WalkBtn: TBtnPanel
  1091.         Left = 321
  1092.         Top = 1
  1093.         Width = 88
  1094.         Height = 20
  1095.         BorderColor = clHighlight
  1096.         Align = alLeft
  1097.         BorderWidth = 1
  1098.         Caption = 'Speedwalking'
  1099.         Font.Color = clBtnText
  1100.         Font.Height = -11
  1101.         Font.Name = 'MS Sans Serif'
  1102.         Font.Style = []
  1103.         ParentFont = False
  1104.         TabOrder = 5
  1105.         OnClick = WalkBtnClick
  1106.       end
  1107.     end
  1108.   end
  1109.   object CopyBtn: TBitBtn
  1110.     Left = 72
  1111.     Top = 300
  1112.     Width = 62
  1113.     Height = 27
  1114.     Hint = '|Make a copy of the selected button'
  1115.     Caption = '&Copy'
  1116.     Font.Color = clBtnText
  1117.     Font.Height = -12
  1118.     Font.Name = 'MS Sans Serif'
  1119.     Font.Style = []
  1120.     ParentFont = False
  1121.     TabOrder = 10
  1122.     OnClick = CopyBtnClick
  1123.     Glyph.Data = {
  1124.       56070000424D5607000000000000360400002800000028000000140000000100
  1125.       0800000000002003000000000000000000000000000000000000000000000000
  1126.       80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
  1127.       A600000000000000000000000000000000000000000000000000000000000000
  1128.       0000000000000000000000000000000000000000000000000000000000000000
  1129.       0000000000000000000000000000000000000000000000000000000000000000
  1130.       0000000000000000000000000000000000000000000000000000000000000000
  1131.       0000000000000000000000000000000000000000000000000000000000000000
  1132.       0000000000000000000000000000000000000000000000000000000000000000
  1133.       0000000000000000000000000000000000000000000000000000000000000000
  1134.       0000000000000000000000000000000000000000000000000000000000000000
  1135.       0000000000000000000000000000000000000000000000000000000000000000
  1136.       0000000000000000000000000000000000000000000000000000000000000000
  1137.       0000000000000000000000000000000000000000000000000000000000000000
  1138.       0000000000000000000000000000000000000000000000000000000000000000
  1139.       0000000000000000000000000000000000000000000000000000000000000000
  1140.       0000000000000000000000000000000000000000000000000000000000000000
  1141.       0000000000000000000000000000000000000000000000000000000000000000
  1142.       0000000000000000000000000000000000000000000000000000000000000000
  1143.       0000000000000000000000000000000000000000000000000000000000000000
  1144.       0000000000000000000000000000000000000000000000000000000000000000
  1145.       0000000000000000000000000000000000000000000000000000000000000000
  1146.       0000000000000000000000000000000000000000000000000000000000000000
  1147.       0000000000000000000000000000000000000000000000000000000000000000
  1148.       0000000000000000000000000000000000000000000000000000000000000000
  1149.       0000000000000000000000000000000000000000000000000000000000000000
  1150.       0000000000000000000000000000000000000000000000000000000000000000
  1151.       0000000000000000000000000000000000000000000000000000000000000000
  1152.       0000000000000000000000000000000000000000000000000000000000000000
  1153.       0000000000000000000000000000000000000000000000000000000000000000
  1154.       0000000000000000000000000000000000000000000000000000000000000000
  1155.       0000000000000000000000000000000000000000000000000000000000000000
  1156.       000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
  1157.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
  1158.       03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF
  1159.       0303030303030303030000000000000000000003030303030303030303F8F8F8
  1160.       F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303
  1161.       0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF
  1162.       FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303
  1163.       0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF
  1164.       03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03
  1165.       FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303
  1166.       F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF
  1167.       FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF
  1168.       FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF
  1169.       0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03
  1170.       0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303
  1171.       F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF
  1172.       0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF
  1173.       FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303
  1174.       0303030300FF070707070707FF0003030303030303030303F8FF030303030303
  1175.       03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303
  1176.       F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303
  1177.       0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF
  1178.       FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303
  1179.       030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8
  1180.       0303030303030303030303030303030303030303030303030303030303030303
  1181.       0303030303030303030303030303030303030303030303030303030303030303
  1182.       0303030303030303030303030303030303030303030303030303}
  1183.     Margin = 2
  1184.     NumGlyphs = 2
  1185.     Spacing = -1
  1186.     IsControl = True
  1187.   end
  1188.   object HelpPanel: TPanel
  1189.     Left = 0
  1190.     Top = 333
  1191.     Width = 564
  1192.     Height = 20
  1193.     Align = alBottom
  1194.     Alignment = taLeftJustify
  1195.     BevelOuter = bvLowered
  1196.     Font.Color = clWindowText
  1197.     Font.Height = -11
  1198.     Font.Name = 'MS Sans Serif'
  1199.     Font.Style = []
  1200.     ParentFont = False
  1201.     TabOrder = 11
  1202.   end
  1203.   object PopupMenu1: TPopupMenu
  1204.     Left = 16
  1205.     Top = 64
  1206.     object MoveUp1: TMenuItem
  1207.       Caption = 'Move Up'
  1208.       ShortCut = 0
  1209.       OnClick = UpBtnClick
  1210.     end
  1211.     object MoveDown1: TMenuItem
  1212.       Caption = 'Move Down'
  1213.       ShortCut = 0
  1214.       OnClick = DownBtnClick
  1215.     end
  1216.     object N1: TMenuItem
  1217.       Caption = '-'
  1218.       ShortCut = 0
  1219.     end
  1220.     object New1: TMenuItem
  1221.       Caption = 'New'
  1222.       ShortCut = 0
  1223.       OnClick = NewBtnClick
  1224.     end
  1225.     object Copy1: TMenuItem
  1226.       Caption = 'Copy'
  1227.       ShortCut = 0
  1228.       OnClick = CopyBtnClick
  1229.     end
  1230.     object Delete1: TMenuItem
  1231.       Caption = 'Delete'
  1232.       ShortCut = 0
  1233.       OnClick = DelBtnClick
  1234.     end
  1235.   end
  1236.   object OpenBmp: TOpenDialog
  1237.     DefaultExt = 'BMP'
  1238.     FileEditStyle = fsEdit
  1239.     Filter = 'Images|*.bmp'
  1240.     Left = 56
  1241.     Top = 64
  1242.   end
  1243. end
  1244.